(dired-restore-desktop-buffer): Use `mapc' rather than `mapcar'.

diff --git a/lisp/dired.el b/lisp/dired.el
index d263f0b3044d0a5bee3b85879bc0dbfe4174d671..3cd8821484e8973777ab11cb0232a88ce345783c 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3336,7 +3336,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
           (dired dired-dir)
           ;; The following elements of `desktop-buffer-misc' are the keys
           ;; from `dired-subdir-alist'.
-          (mapcar 'dired-maybe-insert-subdir (cdr desktop-buffer-misc))
+          (mapc 'dired-maybe-insert-subdir (cdr desktop-buffer-misc))
           (current-buffer))
       (message "Desktop: Directory %s no longer exists." dir)
       (when desktop-missing-file-warning (sit-for 1))